home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 2 / Tech Arsenal 2 (Arsenal Computer).iso / lan_nov / l11g01.exe / GETATRIB.PAT < prev    next >
Encoding:
Text File  |  1993-01-27  |  1.2 KB  |  33 lines
  1. TARGET=C:\NWLITE\CLIENT.EXE
  2. LIST
  3.     print "GETATRIB.PAT - NetWare Lite Client get device attribute fix, German version.\n"
  4. VERIFY
  5.     va = search ( E9 31 F2 90 90 E8 26 fD 73 09
  6.                   3C 12 75 03 B8 02 00 checksum 733 )
  7.     vc = search ( 83 FF FF 75 08 33 C0 8B F8 8B
  8.                   D8 F8 C3 C6 06 D5 00 16 E9 BC 0D checksum BFB )
  9.     if ((va=1000) AND (vc=234) ) then
  10.         print "  $TARGET already contains patch GETATRIB.PAT.\n"
  11.         stop
  12.     else
  13.         print "  $TARGET does not contain patch GETATRIB.PAT.\n"
  14.     endif
  15. APPLY
  16.     print "  Applying patch GETATRIB.PAT to $TARGET...\n"
  17.     vb = search ( C6 06 D5 00 16 E8 26 FD 73 09
  18.                   3C 12 75 03 B8 02 00 checksum 5BE )
  19.     if (vb=1000) then
  20.         patch 1000 ( E9 31 F2 90 90 checksum 32C )
  21.         patch  234 ( 83 FF FF 75 08 33 C0 8B F8 8B
  22.                      D8 F8 C3 C6 06 D5 00 16 E9 BC 0D checksum BFB )
  23.         write
  24.         print "  $TARGET now contains patch GETATRIB.PAT.\n"
  25.         stop
  26.     else
  27.         print "  Could not find pattern indicating that $TARGET\n"
  28.         print "  needs this patch.  Make sure you are using this\n"
  29.         print "  patch with NetWare Lite CLIENT.EXE, German version 1.1.\n"
  30.         stop
  31.     endif
  32.  
  33.